home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Tech Arsenal 1
/
Tech Arsenal (Arsenal Computer).ISO
/
tek-09
/
marks1.zip
/
MARKS.BAT
< prev
next >
Wrap
DOS Batch File
|
1992-03-15
|
488b
|
32 lines
ECHO OFF
CLS
DATE
CLS
ISAM
RUNCOB MARK01
CLS
IF ERRORLEVEL 002 GOTO DRIVEB
IF ERRORLEVEL 001 GOTO DRIVEA
IF ERRORLEVEL 000 GOTO END
:DRIVEA
ECHO ON
PAUSE Place BACKUP DISKETTE in Drive A
COPY *.FIL A:
COPY *.KEY A:
PAUSE Remove BACKUP DISKETTE from Drive A
ECHO OFF
GOTO END
:DRIVEB
ECHO ON
PAUSE Place BACKUP DISKETTE in Drive B
COPY *.FIL B:
COPY *.KEY B:
PAUSE Remove BACKUP DISKETTE from Drive B
ECHO OFF
GOTO END
ECHO OFF
:END
ISAM /F
CD\
ECHO ON